home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 1 / MacMania 1.toast / Educational / Education'More / M-Q / Math.cpt / Math / card_3045.txt < prev    next >
Text File  |  1990-12-18  |  3KB  |  152 lines
  1. -- card: 3045 from stack: in
  2. -- bmap block id: 3605
  3. -- flags: 0000
  4. -- background id: 2700
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on opencard
  8.   global right, wrong
  9.   put 0 into right
  10.   put right into  field numright
  11.  
  12.   put 0 into wrong
  13.   put wrong into  field numwrong
  14.   click at loc of card field result
  15. end opencard
  16.  
  17.  
  18.  
  19.  
  20.  
  21. -- part 1 (field)
  22. -- low flags: 01
  23. -- high flags: 0000
  24. -- rect: left=231 top=164 right=194 bottom=274
  25. -- title width / last selected line: 0
  26. -- icon id / first selected line: 0 / 0
  27. -- text alignment: 65535
  28. -- font id: 3
  29. -- text size: 24
  30. -- style flags: 256
  31. -- line height: 32
  32. -- part name: second
  33.  
  34.  
  35. -- part 2 (field)
  36. -- low flags: 00
  37. -- high flags: 0002
  38. -- rect: left=230 top=207 right=237 bottom=276
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 0 / 0
  41. -- text alignment: 65535
  42. -- font id: 3
  43. -- text size: 24
  44. -- style flags: 256
  45. -- line height: 32
  46. -- part name: result
  47. ----- HyperTalk script -----
  48. on returnInField
  49.   global right,wrong
  50.  
  51.   if card field result <> (card field first)*(card field second) then
  52.     put "Try again" into card field feedback
  53.     talk card field feedback ,150,150
  54.     put "" into card field result
  55.     put wrong +1 into wrong
  56.     put wrong into field numwrong
  57.   end if
  58.   if card field result = (card field first)*(card field second) then
  59.     put right +1 into right
  60.     put right into field numright
  61.     put "Right" into card field feedback
  62.     talk card field feedback,150,150
  63.  
  64.     put round of random of 9 into card field first
  65.     talk card field first,150,150
  66.     talk "times",150,150
  67.     put round of random of 9 into card field second
  68.     talk card field second,150,150
  69.     put "" into card field result
  70.  
  71.   end if
  72.  
  73.   put "" into card field feedback
  74.   click at the loc of card field result
  75. end returnInField
  76.  
  77.  
  78.  
  79. -- part 4 (field)
  80. -- low flags: 01
  81. -- high flags: 0000
  82. -- rect: left=231 top=127 right=158 bottom=274
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 65535
  86. -- font id: 3
  87. -- text size: 24
  88. -- style flags: 256
  89. -- line height: 32
  90. -- part name: first
  91.  
  92.  
  93. -- part 5 (field)
  94. -- low flags: 01
  95. -- high flags: 0000
  96. -- rect: left=341 top=123 right=149 bottom=463
  97. -- title width / last selected line: 0
  98. -- icon id / first selected line: 0 / 0
  99. -- text alignment: 0
  100. -- font id: 3
  101. -- text size: 18
  102. -- style flags: 256
  103. -- line height: 24
  104. -- part name: feedback
  105.  
  106.  
  107. -- part 12 (button)
  108. -- low flags: 00
  109. -- high flags: 0000
  110. -- rect: left=228 top=298 right=321 bottom=254
  111. -- title width / last selected line: 0
  112. -- icon id / first selected line: 1014 / 1014
  113. -- text alignment: 1
  114. -- font id: 0
  115. -- text size: 12
  116. -- style flags: 0
  117. -- line height: 16
  118. -- part name: Preevious Card
  119. ----- HyperTalk script -----
  120. on mouseUp
  121.   go to prev card
  122. end mouseUp
  123.  
  124.  
  125.  
  126. -- part contents for background part 6
  127. ----- text -----
  128. test
  129.  
  130. -- part contents for card part 1
  131. ----- text -----
  132. 7
  133.  
  134. -- part contents for card part 4
  135. ----- text -----
  136. 1
  137.  
  138. -- part contents for card part 9
  139. ----- text -----
  140. 0
  141.  
  142. -- part contents for card part 10
  143. ----- text -----
  144. 0
  145.  
  146. -- part contents for background part 22
  147. ----- text -----
  148. 0
  149.  
  150. -- part contents for background part 23
  151. ----- text -----
  152. 0